home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #5 / Amiga Plus CD - 2000 - No. 5.iso / Tools / DFUE / CIM / is / ciminstall81.iscript < prev    next >
Text File  |  2000-01-01  |  10KB  |  406 lines
  1. ;
  2. ; Installer Script for CIM V3
  3. ; $VER: CIMInstallerScript 3.1.88 (31.05.2000) Written by Jan-Erik Tervo 1997-2000
  4. ; Installer version 42.12 or better recommended /required
  5. ;
  6.  
  7. (ONERROR
  8.       (EXIT)
  9.         )
  10.  
  11.  
  12. (COMPLETE 0)
  13.  
  14. (RUN "run multiview is/cim_v3.iff")
  15.  
  16. (SET @default-dest "SYS:Expansion")
  17.  
  18. (IF  (exists "CIM:" (noreq))
  19.      (
  20.      (SET cim_vernum (getversion "CIM:bin/cim"))
  21.      (SET cim_ver (/ cim_vernum 65536))
  22.      (SET cim_rev (- cim_vernum (* cim_ver 65536)))
  23.      
  24.      (SET @default-dest (pathonly(expandpath "CIM:")))
  25.      )
  26. )
  27.  
  28. (SET CIMdir @default-dest)
  29.  
  30. ; ENGLISH STRINGS
  31.  
  32. (SET #alku_str
  33.      (cat "\n\n\nWelcome to the CIM V3 Installer script.\n\n \CIM - (the Caller Id Manager)\ Copyright Jan-Erik Tervo 1996, 1997, 1998, 1999, 2000.\n\nCharity- & Shareware.\n\n\n")
  34.     )
  35.  
  36. (SET #where_to_str
  37.      (cat "Select where to install CIM. A sub directory called 'CIM' WILL BE created there if not already present.")
  38.     )
  39.  
  40. (SET #str-installingf
  41.      (cat "\n\nInstalling thinpazB.font")
  42.     )
  43.  
  44. (SET #str-installing2-exe
  45.      (cat "\n\nInstalling. . . ")
  46.     )
  47.  
  48. (SET #str-installingodu
  49.      (cat "\n\nInstalling OwnDevUnit.library")
  50.     )
  51.     
  52. (SET #str-installingrxh
  53.      (cat "\n\nInstalling rexxhost.library")
  54.     )
  55.     
  56. (SET #str-installingmul
  57.      (cat "\n\nInstalling multifunction.library")
  58.     )
  59.     
  60. (SET #str-alreadyi
  61.      (cat "\n\nYou have CIM already installed!\n\nExecutable version: " cim_ver '.' cim_rev )
  62.     )
  63.  
  64. (SET #str-iccc
  65.      (cat "\n\nInstallation completed.\n\n\nCIM's Official Home Page located at: http://www.netti.fi/~jet/cim/ and http://www.saunalahti.fi/~jet3/cim/ \n")
  66.     )
  67.  
  68. (SET #lecut
  69.      (cat "\nOn Low Storage Space situation cut logs to:")
  70.     )
  71.  
  72. (SET #tyok "ibrowse")
  73. (SET _stakki 15000)
  74.  
  75. (MESSAGE #alku_str)
  76.  
  77.  
  78.  
  79.  
  80. (IF cim_vernum
  81.      
  82.                (IF (ASKBOOL(
  83.                          (help "No help for this function")
  84.                          (prompt #str-alreadyi)
  85.                          (choices "Cancel" "Proeed")
  86.                          
  87.                        )
  88.                          
  89.                )
  90.                 
  91.                (EXIT)) 
  92.                
  93.                     
  94.                     
  95. )
  96.      
  97.  
  98.  
  99.  
  100.  
  101.  
  102. (SET CIMdir
  103.      (ASKDIR (prompt #where_to_str)
  104.                                    (HELP "No help for this function")
  105.                                    (DEFAULT @default-dest)
  106.  
  107.            )
  108. )
  109.  
  110.  
  111. (SET Finddir (TACKON CIMdir "CIM"))
  112.  
  113. (COMPLETE 5)
  114.  
  115. (STARTUP "CIM - http://www.netti.fi/~jet/cim/"
  116.           (prompt "Modify s:startup-sequece. Some instructions need to be added to the \"s:user-startup\" so that your system will be properly configured to use CIM.")
  117.           (help "No help for this function")
  118.           (command "ASSIGN CIM: " Finddir)
  119. )
  120.  
  121.  
  122. (COMPLETE 7)
  123.  
  124. (SET _man (ASKBOOL(
  125.                          (prompt "Install HTML Manual?\n")
  126.                          (help "No help for this function")
  127.                          
  128.                   )
  129.           )
  130. )
  131.  
  132.  
  133.  
  134. (IF _man
  135.      (SET #tyok
  136.           (askfile 
  137.  
  138.                     (prompt "\nChoose a HTML-browser you want to use.")
  139.                     (help "No help")
  140.                     (default "SYS:Internet")
  141.                     )
  142.      
  143.      )
  144. )
  145.  
  146. (COMPLETE 8)
  147.  
  148. (set #ok 0)
  149. (set #instchoice 0)
  150.  
  151. (while (not #ok)
  152.    (
  153.        (set #instchoice
  154.            (askchoice
  155.                (prompt #lecut)
  156.                (help "This feature is turned off by the default. Enable it from 'Settings/Misc/Storage Watch'")
  157.                (choices "300K (50K each)" "3000K (500K each)" "18000K (3000K each)")
  158.                (default 2)
  159.            )
  160.        )
  161.  
  162.       (if (= #instchoice 0)
  163.       (set #ok 1)
  164.       )
  165.       
  166.       (if (= #instchoice 1)
  167.       (set #ok 1)
  168.       )
  169.       
  170.       (if (= #instchoice 2)
  171.       (set #ok 1)
  172.       )
  173.    )
  174. )
  175.  
  176.  
  177.  
  178.  
  179.  
  180.  
  181.  
  182.  
  183.  
  184. (COMPLETE 10)
  185.  
  186.  
  187.  
  188. (MAKEDIR Finddir
  189.           (help "No help for this function")
  190.           (infos)
  191.           (prompt "CIM dir will be created next")         
  192.  
  193. )
  194.  
  195. (SET @default-dest Finddir)
  196. (MAKEASSIGN "CIM" Finddir)
  197.  
  198. (COMPLETE 15)
  199.  
  200. ;  Install Stuff
  201.  
  202.  
  203. (COPYFILES
  204.         (help "No help for this function")
  205.         (source "fonts/")
  206.         (pattern "#?")
  207.         (fonts)
  208.         (dest "FONTS:")
  209.         (prompt #str-installingf)
  210.         (confirm)
  211.          )
  212.  
  213. (COMPLETE 20)
  214.  
  215. (COPYLIB
  216.         (help "No help for this function")
  217.         (source "3rdpartylibs/owndevunit.library")
  218.         
  219.         (dest "LIBS:")
  220.         (prompt #str-installingodu)
  221.         (confirm)
  222.          )
  223.  
  224. (COMPLETE 35)
  225.  
  226. (COPYLIB
  227.         (help "No help for this function")
  228.         (source "3rdpartylibs/rexxhost.library")
  229.         
  230.         (dest "LIBS:")
  231.         (prompt #str-installingrxh)
  232.         (confirm)
  233.          )
  234.  
  235.  
  236. (COMPLETE 40)
  237.  
  238. (COPYLIB
  239.         (help "No help for this function")
  240.         (source "3rdpartylibs/multifunction.library")
  241.         
  242.         (dest "LIBS:")
  243.         (prompt #str-installingmul)
  244.         (confirm)
  245.          )
  246.  
  247.  
  248. (COMPLETE 45)
  249.  
  250.  
  251. (DELETE "CIM:bin/cim")
  252. (DELETE "CIM:bin/waitforthefile")
  253.  
  254. (COPYFILES
  255.         (help "No help for this function")
  256.         (source "stuff/")
  257.         (pattern "#?")
  258.         (dest Finddir)
  259.         (prompt #str-installing-exe)
  260.          )
  261.  
  262. (COMPLETE 50)
  263.  
  264.  
  265.  
  266.  
  267.  
  268.  
  269. (IF _man
  270.         (
  271.           (COPYFILES
  272.                (help "No help for this function")
  273.                (source "stuff2/")
  274.                (pattern "#?")
  275.                (dest "CIM:DOCS/")
  276.                (prompt "Installing")
  277.           )
  278.          
  279.           (ICONINFO
  280.                (dest #tyok)
  281.                (prompt "")
  282.                (getstack "_stakki")
  283.           )
  284.          
  285.           (TOOLTYPE 
  286.                     (dest "CIM:DOCS/MANUAL/index.html")
  287.                     (setdefaulttool #tyok)
  288.                     (setstack _stakki)
  289.           )
  290.          )
  291.                               
  292.  
  293. )
  294.   
  295.  
  296.  
  297.                                                                                                                                                                                                                            (COMPLETE 77)
  298.  
  299.                                                                                                                                                                                                                                 (IF (exists "cim_v2.key")
  300.                                                                                                                                                                                                                                       (COPYFILES
  301.                                                                                                                                                                                                                                            (source "cim_v2.key")
  302.                                                                                                                                                                                                                                            (dest "s:")
  303.                                                                                                                                                                                                                                                   )
  304.                                                                                                                                                                                                                                        )
  305.  
  306. (COMPLETE 80)
  307.  
  308. (IF (= #instchoice 0)
  309.  
  310.     (COPYFILES
  311.                (help "No help for this function")
  312.                (source "stuff3/logsizer.cfg_0")
  313.                
  314.                
  315.                (dest "CIM:SCRIPTS/AREXX/LOGSIZER/")
  316.                (newname "logsizer.cfg")
  317.                
  318.                (prompt "Installing")
  319.     )
  320.    
  321. )
  322.  
  323.  
  324.  
  325. (IF (= #instchoice 1)
  326.  
  327.     (COPYFILES
  328.                (help "No help for this function")
  329.                (source "stuff3/logsizer.cfg_1")
  330.                
  331.                
  332.                (dest "CIM:SCRIPTS/AREXX/LOGSIZER/")
  333.                (newname "logsizer.cfg")
  334.                
  335.                (prompt "Installing")
  336.     )
  337.    
  338. )
  339.  
  340.  
  341.  
  342. (IF (= #instchoice 2)
  343.  
  344.     (COPYFILES
  345.                (help "No help for this function")
  346.                (source "stuff3/logsizer.cfg_2")
  347.                
  348.                
  349.                (dest "CIM:SCRIPTS/AREXX/LOGSIZER/")
  350.                (newname "logsizer.cfg")
  351.                
  352.                (prompt "Installing")
  353.     )
  354.    
  355. )
  356.  
  357. (COMPLETE 85)
  358.         
  359. (MESSAGE #str-iccc)
  360.  
  361.  
  362.  
  363. (COMPLETE 85)
  364.  
  365. (RENAME "FONTS:ThinpazB/8.f" "FONTS:ThinpazB/8")
  366. (RENAME "FONTS:ThinpazB/8.f.asc" "FONTS:ThinpazB/8.asc")
  367.  
  368. (RENAME "CIM:bin/cim.exe" "CIM:bin/cim")
  369.           (RENAME "CIM:bin/cim.exe.asc" "CIM:bin/cim.asc")
  370.      
  371. (RENAME "CIM:bin/waitforthefile.exe" "CIM:bin/waitforthefile")
  372.           (RENAME "CIM:bin/waitforthefile.exe.asc" "CIM:bin/waitforthefile.asc")
  373.  
  374. (RENAME "CIM:CALLERDATA/latest.cimd" "CIM:CALLERDATA/latest")
  375. (RENAME "CIM:CALLERDATA/latest.cimd.asc" "CIM:CALLERDATA/latest.asc")
  376.  
  377.  
  378. (RENAME "CIM:CALLERDATA/7117-AreaName/71171234567890.cimd" "CIM:CALLERDATA/7117-AreaName/71171234567890")
  379. (RENAME "CIM:CALLERDATA/7117-AreaName/71171234567890.cimd.asc" "CIM:CALLERDATA/7117-AreaName/71171234567890.asc")
  380.  
  381.  
  382.  
  383. (RENAME "CIM:cim.exei.info" "CIM:cim.info")
  384.  
  385. (PROTECT "CIM:bin/cim" "rwed")
  386.  
  387. (COMPLETE 90)
  388.  
  389. (RUN "run multiview is/cim_wb.iff")
  390.  
  391. (RUN "wait 3")
  392.  
  393. (RUN "multiview /cim_v3.readme")
  394.  
  395. (RUN "multiview README_FIRST")
  396.  
  397. (RUN "multiview IMPORTANT")
  398.  
  399. (COMPLETE 100)
  400.  
  401. ; end of installation
  402.  
  403. (EXIT)
  404.  
  405.  
  406.